home *** CD-ROM | disk | FTP | other *** search
/ Mesolore / Mesolore - Disc 1.iso / pc / data / Buttons.cst / 00053_Script_compass roll < prev    next >
Text File  |  2001-04-13  |  1KB  |  45 lines
  1. on exitFrame
  2. --  if sprite(13).movietime >= sprite(13).duration-10 then
  3. --    sprite(13).movierate = 0
  4. --    sprite(13).visible = FALSE
  5. --    sprite(2).visible = True
  6. --    updatestage
  7. --    abort
  8. --  end if
  9.   repeat with x = 4 to 7
  10.     if rollover(x) then
  11.       clearAll x
  12.       (sprite (x+5)).visible = TRUE
  13.       (sprite 8).member = "bg" & x -3
  14.       roll x + 5
  15.       exit repeat
  16.     end if
  17.     case (the frameLabel) of
  18.       "nuttall-text": (sprite 8).member = "bg2"
  19.       "nuttall-notext": (sprite 8).member = "bg2"
  20.       "selden text": (sprite 8).member = "bg1"
  21.       "selden-notext": (sprite 8).member = "bg1"
  22.       "homeb": (sprite 8).member = "bg3"
  23.     end case
  24.     clearall 77
  25.   end repeat
  26.   updatestage
  27.   
  28.   repeat with z = 19 to 30
  29.     if rollover(z) then
  30.       roll z
  31.     else
  32.       unroll z
  33.     end if
  34.   end repeat
  35.   go the frame
  36. end
  37.  
  38. on clearall wh
  39.   repeat with x = 9 to 12
  40.     if wh <> x -5 then
  41.       if not rollover(x) then unroll x
  42.       (sprite (x)).visible = False
  43.     end if
  44.   end repeat
  45. end